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#define f 100 
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Right, 
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wait 50 do Left, 
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always if Left then do always F=m*x" watching Right, 
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always if Right then do always -F=m*x" watching Left, 


7 


sample (x) , 
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x=0, x' =0, 
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module "C" 


10 


{ 


11 


int setDataToCtrl ( int num. int data ) 


12 


{ 


13 


outport (num, data) ; 


14 


} 


15 


int getDataFromCtr I ( int num ) 


16 


{ 


17 


return inport (num) ; 


18 
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}, 
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int setDataToCtr I ( int num, int data ), 


21 


int getDataFromCtr I ( int num ), 


22 
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process ( E1 ) { 


24 


setDataToCtr I ( 1, x ) 


25 


}, 
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process ( E2 ) { 


27 


x=getDataFromCtr 1(1) 


28 
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